home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 3
/
ct-rom iiib.zip
/
ct-rom iiib
/
WINDOWS
/
DIVERSEN
/
WINE02BX
/
PENDING-.ELC
< prev
next >
Wrap
Text File
|
1993-03-28
|
1KB
|
14 lines
;;; compiled by jwz@thalidomide on Sat Jan 16 01:46:50 1993
;;; from file /cadillac-th/jwz/emacs19/lisp/packages/pending-del.el
;;; emacs version 19.4.1 Lucid.
;;; bytecomp version 2.09; 12-jan-93.
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs18.
(if (and (boundp 'emacs-version)
(or (and (boundp 'epoch::version) epoch::version)
(string-lessp emacs-version "19")))
(error "This file was compiled for Emacs19."))
(byte-code "└┴Mê┬├Mê─┼╞╟#ê─╚╞╟#ê─╔╞╟#ê─╩╞╦#ê─╠╞╦#ê─═╞╦#ê─╬╞╟#ê─╧╞╟#ê─╨╞╟#ê╤╥┬\"ê╟└ç" [delete-active-region #[(&optional killp) "?¡▓┴\n!¡¡p├\n!=¡ª─┼\n!W¡ƒ─╞\n!W¡ÿ½ï╚┼\n!╞\n!\"ê¬ê┼\n!╞\n!|ê╔ç" [buffer-read-only extentp primary-selection-extent extent-buffer 0 extent-start-position extent-end-position killp kill-region t] 4] pending-delete-pre-hook #[nil "9¡â┴Në├=½à─┼!¬ò\n╞=½è─╟!¡ï╚ë¬å\n¡â─╟!)ç" [this-command pending-delete type kill delete-active-region t supersede nil (lambda nil (interactive))] 3] put self-insert-command pending-delete t yank x-yank-clipboard-selection delete-backward-char supersede backward-delete-char-untabify delete-char newline-and-indent newline open-line add-hook pre-command-hook zmacs-regions] 4)